home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #14
/
Monster Media No. 14 (April 1996) (Monster Media, Inc.).ISO
/
prog_d
/
oleauttr.zip
/
NUMSVR.ZIP
/
NUMSVR.DFM
/
NUMSVR.txt
Wrap
Text File
|
1995-03-23
|
1KB
|
73 lines
object frmNumSvr: TfrmNumSvr
Left = 247
Top = 301
Width = 420
Height = 187
Caption = 'Delphi OLE Automation: NumSvr Controller'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
PixelsPerInch = 96
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 16
object Label1: TLabel
Left = 184
Top = 24
Width = 217
Height = 16
AutoSize = False
Caption = 'Modify the server'#39's property X .'
end
object Label2: TLabel
Left = 184
Top = 64
Width = 209
Height = 33
AutoSize = False
Caption = 'Pass an argument by reference to a server method: Incr(n)'
end
object cmdExit: TButton
Left = 16
Top = 112
Width = 105
Height = 33
Caption = 'E&xit'
TabOrder = 1
OnClick = cmdExitClick
end
object cmdBumpit: TButton
Left = 16
Top = 16
Width = 105
Height = 33
Caption = 'Add 1 to X'
TabOrder = 0
OnClick = cmdBumpitClick
end
object txtXVal: TEdit
Left = 129
Top = 69
Width = 40
Height = 24
AutoSize = False
MaxLength = 4
TabOrder = 2
Text = '1'
end
object cmdIncr: TButton
Left = 16
Top = 64
Width = 105
Height = 33
Caption = 'Increment me'
TabOrder = 3
OnClick = cmdIncrClick
end
object OleAutoClient1: TOleAutoClient
Left = 140
Top = 114
end
end